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P VI RICORDATE DELLA 
SOUND BOARD? ANDATE A 
PRENDERLA PERCHÈ È ARRIVATO 
IL MOMENTO DI COSTRUIRE 
UNA INTERFACCIA DI POTENZA 
A SEDICI CANALI PER PILOTARE 
TUTTO QUELLO CHE VOLETE. 
ECCO UN SUPER IMPIANTO DI 
LUCI SEQUENZIALI 
PROGRAMMABILI, SOFTWARE 
INCLUSO! 


V i ricordate la Sound Board pubblicata in Febbraio '827 
Beh, è arrivato il momento di ritirarla fuori dal cassetto 
per dar vita ad uria nuova interfaccia: sj tratta di un modulo di 
potenza a sedici canali in grado di pilotare altrettanti carichi 
indipendenti. Gra/ie alla Sound Board ed al vostro ZXCom¬ 
puter potete pilotare tutto quello che volete. Potete, per esem¬ 
pio, realizzarvi un megaimpianto di luci sequenziali in grado 
di sfruttare la potenza dello ZX per la creazione e memorizza¬ 
tone delle sequenze piti spettacolari, e con sedici canali c'è 
veramente da sbizzarrirai. 

1 moduli di potenza utilizzali sono quelli prodotti dalla 
ditta Vematron, studiati in modo tale da essere completamen¬ 
te disaccoppiati fra carico e segnale pilota. Il segnale di con¬ 
trollo è prelevato dallo /creolo predisposto sullo stampato 
della Sound e l'unico filo in più da portare alla basetta di 
potenza è quello di massa. 


IL funzionamento è abbastanza banale: dopo aver abilitato 
la scheda con j soliti POR h {le prime righe prima dei lornext) 
inviamo all'AY i dati ricordando che ad ogni pin dello zocco¬ 
lo corrisponde un particolare valore decimale. Il numero 255 
corrisponde a tutto acceso, mentre lo zero corrisponde a tutto 
spento. Se utilizzate una sola polla a otto bit potete dare una 
sola volta nel programma la selezione dell'indirizzo e del 
registro, dando di volta in volta solo il POKEdel dato. Se non 
vi è chiaro guardate il programma, non è difficile. 

Anche se l'ingresso è disaccappiato otticamente, lo stam¬ 
pato è percorso abbondantemente dai 220Vche sono decisa¬ 
mente poco gradevoli al tatto. Cercate anche di mantenere i 
fili che arrivano dal computer distaccati dalla matassa di 
cavetti che portano il 220 alle prese o alle lampade perchè c'è 
la possibilità dì inneschi c affini che possono determinare una 
precoce fine del vostro raro ÀY. Per quanto riguarda gli 
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UN PO’ A CASO 


W LA RAPIDITÀ 


1® LET t>=32?66 
20 LET fi=3£767 
30 POKE PI,. 7 
40 POKE 0,255 
30 POKE fi , 14- 
11© POKE D,RND*255 
13© GOTO 9© 


I primi programmim usano sempre il random per dare 
un'idea di quello che fa una particolare scheda con il 
minimo di programma, ecco quindi l'essenza della 
programmazione del modulo di potenza attraverso solo 
otto porte a un bit. La riga abilita k- otto inferiori. 


E LET K=1 

10 LET fi=32767 
20 LET D=32766 
30 POKE fi.. 7 

4-0 POKE D / 255 

SO POKE fi, 15 ^ ... 

60 FOR K = 1 TO 2S5 5TEP 2*K 

7© POKE D, K 
SO NEXT K 

Se volete vedere una sequenza simile alla progressione 
binaria ma non volete vedere 255 stadi diversi, ecco 

11 programma che fa per voi: fa accendere in sequenza 

tutte le lampade ma in poche mosse. 


MINIPROGRAMMA SUPEREFFETTO GRAN FINALE 


10 LET D =32766 
20 LET R = 32767 
30 POKE fi , 7 
4-0 POKE 0,255 
50 DXM U L25J 
60 FOR J=1 TO 25 
7© INPUT UfJ) 

SO NEXT U 
©2 CL5 

64- PRINT "UELOCITfì fin 7 " 

©6 INPUT S 
3© POKE P..14 
1©0 FOR J-l TO SS 
11© POKE D.UtJ) 

12© PAUSE S 
13© NEXT *J 
14-© GOTO 10© 

Pìccolo ma polente, ecco tulio quello die serve per 
programmarvi una sequenza di accensione delle eventuali 
luci connesse ad otto moduli di potenza. Il dimensionamento 
deira rray W e la lunghezza dei For Ncxt de lenii ina 
la durata della sequenza prima che si ripeta, Potete 
anche farla di tremila passi, se avete un I 6K RAM, 

e scusate se è poco. 


5 LET T~1 
1© LET fl=3£7G7 
2© LET D =32766 
30 POKE R., 7 
4-© POKE D,£55 
S© POKE A ? 15 
©0 FOR J=1 TO 6 
7© LET T=a**U-l 
6© POKE D/T 
S© NEXT U 
10© FOR *J=e TO 7 
11© LET T=aS5-2^itJ 
120 POKE D * T 
130 NEXT 

14-© FOR J = 8 TO 1 STEP -1 

15© LET T=a**J-l 

16© POKE D^T 

17© NEXT O 

16© GOTO G© 


Questa volta sono For FNext a determinare la sequenza; 
se vi sembra troppo lenta allora ricordatevi che esiste anche 
il Tasi mentre un Let Li = RND rallenta abbastanza 
il loop, E con quest 1 ultimo listato speriamo di aver 
stimolato abbastanza la vostra fantasia, buon divertimento. 



PflINl 




= NPLJl 


POKé 


GOTC 


ARI. S A^E’AN 


impieghi, vi diamo solo qualche consiglio potete per esempio 
mantenere una porta da otto bit in input e I altra in output: 
con un po' di software leggete gli input e in relazione a questi 
attivate dei carichi particolari l£ uscite sono tutte laichaie, 
ovvero rimangono attivate Imo all’arrivo di un nuovo coman¬ 
do, quindi basta un solo POKE per mantenere accesa una 
lampada. Se proprio non ce la tate a farvi un programmino 
tutto vostro ecco quattro listati uno più bello dell'altro: accen¬ 


sione random delle lampade, luci sequenziali programmabili, 
sequenza rapida e infine... sorpresa. Attenzione die l'ultimo 
listato prevede il collegamento alle otto porte superiori dello 
zoccolino, mentre i primi tre azionano le otto intcriori, Se 
volete cambiarli ricordate che il registro 14 è di quelle inferiori 
ed il 15 di quelle superiori. Consultate comunque il numerudi 
Febbraio '82 per maggiori note sulla Sound Board. 
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Sette K... di folletti 


Avete mai pensato alla possibilità di trovarvi in un campo minato inseguiti da 
folletti assetati del vostro sangue? Un programmone da sette K, per il vostro ZX81, 
in grado dì darvi questa possibilità: sta a voi non perderla*.. 


B en sette K di Basic per questo programma senza usare 
un solo byte di linguaggio macchina, eppure come po¬ 
trete constatare voi stessi il gioco si svolge dinamicamente e 
con una buona rapidità. Si tratta di un gioco che dimostra le 
possibilità di gioco intelligente-stupido da pane del computer: 
vi trovate in un campo minato e siete circondati dai folletti che 
vogliono uccidervi (che gentili!) a tutti i costi. Da bravi folletti 
hanno una fretta notevole di affondare i loro unghioni su di 
voi, quindi si dirigono su di voi senza far troppo caso a quello 


che hanno davanti: è così che stupidamente cadono sulle mine 
che scoppiano ed eliminano il folletto. Sta a voi cercare di 
spostarvi in posti opportuni stuzzicando i folletti ad andare 
sopra le mine. E fin qui potrebbe anche essere fattibile, però 
anche per voi le mine sono mortali e c'è anche qualche folletto 
che è più turbo degli altri e schiva le mine con una cena 
abilità. Come se non bastasse c’è anche il losco figuro del baro 
che, quando meno vi conviene si sposta di due posizioni 
invece che una sola e vi mette in serie difficolta. Le regole di 


CAMPO MINATO: 
IL PROGRAMMA 


18 
£ '»} 
30 
4.0 
53 

7£ 

30 

S& 

0,-=l 


RRND 

DTh 

Ls in 5 u4 J 

5 IH MStlì 
t> I ri o$ i &> 
l— ■— T 

PRINT ‘'COME TX CHIRMl?" 

PRINT 

INPUT Tì 

IF < >CHR$ 133 ThEN &OT 


63 PRINT “NO TU NON 

Lh&CIR IL. 

plcun" ‘'Peltro‘ 

F-i 5TOP 
GOTO 
XP 

T $ = “5C0H05CIUTQ 


PUOI GIOCR 
POSTO R OU 


SS 

LET 

90 

100 

110 


THEN 


POR 1=13 TQ 1 5TEP _1 


IF T$il*= 4 ' " ThEN GOTO 13© 

LET T $ l I + li 
itti LET lai 
150 NEXT I 
14© LET Mt-TìClJ 
ISO XF OR 

N4 = M X ,< 

160 PRINT 
170 PRINT '■ CUOI 
IL GIOCO ”;t$ 

ICO INPUT Dì 
190 GL5 

280 IF D$ t 11 “ "N" 

210 PRINT "TU SEX 
DRLLPV' 

220 PRINT "LETTERfì .T 

FOLLETTI TI " 

¥l 0 ED" XNT "SEGUONO PER CIRCONDA 


NS>"Z" THEN LE 
CHE TX SPIEGHI 


THEN GOTO 46© 
RRPPRESENTRTO 


UCCIDERTI,PUOI 
INIZIO SONO UN 


240 PRINT 
L I (ALL" MM 
250 PRINT 
Tl URIDI? “ 

260 PRInì "5ULLE MINE CHE 

. ; chrì e; . mr m 

27© -PRINT "STAr 


5E 


rour anche 

300 PRINT 
ORI LR" 

310 PRINT 
NE NO SE 
340 PRINT 
350 PRINT 
p UOI PREMERE 1 ' 

37 0 PRINT 
R MD55R CASUALE" 

370 PRINT " Mfi MOLTO 
3-32 PPINT 
364 PRINT 

390 PRINT 
400 PRINT 
."412 IR RE 11 
420 INPUT 
430 CL 5 
■Ì7 0 GOTO 4 60 
4E0 PRINT "QK 


5UIRR 

PO ” " 

SONO 

ATTENTO SONO LE 
"PER TE, PER HUOUERTI 
"DIREZIONE CARDINALE ; 



"PREMI 
G £ 


INTRAPPOLATO 
PANICO PER UN 
PERICOLOSA" 


X ■ F QLLETTÌ 


UN TASTO PER I 


ECCOCI QUA 


470 
400 
£=*0 DIM 
LET 

16397 
510 LET 


PhU-'dL G9 
Diri P ES‘ 


020 

530 

74© 

708 

552 

554 


LET 
LET 
LET 
LET 
POR 
PRINT 


L <6? 
D9=PEEK 

M 1 = © 
Cl=ù 
F 1 -25 
5 1-8 
C3“© 

1=0 TO. 


l&39St35&iREEK 



556 

560 


NEXT X 
PRINT 




„* O i 


570|bipor i - x to ie 

560 PRINT AT T,0;"fl 

• SÌ 
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gioco sono contenute nel programma stesso, come anche 
l'autoclave e la partenza automatica da cassetta. Dovete solo 
con pazienza caricarvi tutto il listato (con molta pazienza) e 
dare un RUN 1900 quando volete registrarlo su cassetta. 
Quando scrivete la linea 2000 inserite fra le virgolette il nome 
che preferite in caratteri normali, dopo aver dato il RUN 1900 
potrete vedere che f ultima lettera del nome è stata invertita: è 
segno che il SA VE è stato dato da programma e non in 
comando diretto. In questo modo quando un programma 


salvato con questo metodo è ricaricato da cassetta riparte 
automaticamente dalla riga successiva a quella contenente 
ristmzione di SÀVE. Il trucco per avere fautostart è tutto 
qui. 

Ritorniamo ai nostri folletti: per spostarvi dovete inserire la 
direzione usando i quattro punti cardinali e le loro possibili 
combinazioni: non importa se scrivete SO o Sud Ovest in 
quanto il programma riconosce entrambe le forme, mentre 
per evitare errori i punti Nord, Sud, Est ed Ovest vanno 


59© next x 

6S© PRINT m 

-l tt i mi i inTrfmTT^ 

610 POR 1=1 TO PI 

620 PRINT PT XNT £CRMD*17)+£> ,1 
NT < IRND-3*32 > +2) ; CHR$ 3 
63© NEXT I 
64© POR X=1 TO 8 

65© LET t_ t X t = XNT t*RND*X7)+2) 
BBS LET P TU —XNT f +£3 

67© LET D3 = PÉÉK { D9+1+ P t Ti + X L X I 
2 *33) 3 

63© XP CHR5 DSo'L" THEN GOTO & 

50 

710 PRINT PT Lllj 1 39 

720 NEXT I 





730 
740 
75© 
760 
772 
) ì 

774 


310 

620 


LET L1=INT ì tRNCf*17i +2.» 

LET PI = XNT i iKn&ftSSJ +£> 

LET L2-L1 
LET P2=P1 

LET 08=PEEK fD9 + l + Pl+ fLl*33 


XP CHR$ D 80 ". 1 * THEN GOTO 7 


PRINT 

PRINT 

PRINT 

PRINT 


RT U1,P1;N$ 

RT 8, P&; "PUNTI" 

RT 9,28,SI 

fiT 21,0;*'R TE LA H055 


input [>$ 

PRINT RT 20,0;" 


530 PRINT PT 21,0;“ 

ri ■ i 

■340 LET Ml-Mi+1 

3S0 IF FlJlS AND 51>0 THEN LET 
■ i -5 1 - 1 

560 Ih FI< = 15 THEN LET 51=Slfl 
57© IF C-$a TO 2) ="NO“ OR D£ = 'N 
OPDOUE5T" THEN LET P2=Pl^l 
330 IF OJ tl) VO 1 * THEN LET P2-R1 

390 IF Oliti TO 2)="5Q" OR = 

UDOUEST" THEN LET P2=P1-1 
90© IF D$(l TO 2Ì = ,l NE" OR D*= U N 

um>EST ,+ THEN LET P2-P1+1 
910 IP D!M1) ="E M THEN LET P9 = F1 

4 1 


02© IF Diti TO £) ="SE'* OP D$ = "S 
IJDEST ” THEN LET P2-PH-1 
930 IF tl) - ‘74" THEN LET L2=L1 

■ ■i J. 

940 IF DI, a; ="5 J “ THEN LET i_S = Ll 


9 E- 0 

98© 

1 \ 

070 
■ C-0 1 ^ 

98© 

9 0 

L 0 0 0 
1010 
0 = 0 
1030 

1 0 4 O 
105© 
i 0-50 
1070 
1080 
109© 

1100 

X 

1110 

Ts 


IF 09.(1) = "P“ THEN GOTO 1370 
LET DS=PEEK (D9+1+P2+(L2*33 


IP CHRS ÌDS) AMD CHPS 

>M$ THEN GOTO 144© 

PRINT RT LLPl: " . " 

LET L 1 -= L 2 
LET P1“P2 
PRINT RT L£,P2;N$ 

POR 1=1 TO 3 

IF L(IJ-0 THEN GOTO 1330 

LET L6=LEI) 

LET P8-PtT) 

LET L9~L1—LtI) 

LET P9=P1-PCI) 

Ir RMD*3>=1 THEN GOTO 1140 
IF P9<© THEN LET PtI)=R(D- 

IF P9>0 THEN LET P(I)=paì + 


IF L5>0 THEN 


LET (_ £ Ij =L < I) F 


USO 

A 

IF L9<© 

THEN 

4. 

I 130 

GOTO 1180 

i140 

IF R05 

(P9) > 

3<0 THEN LET 

Ptl) 

I1S0 

IF RB5 

CP9? > 

THEN LET 

P ( I) 

1160 

IF ftfiS 

CL9) > 

9<0 THEN LET 

L £ I; 

1170 

IF R0o 

ÌL9J ?■ 

9>S THEN LET 

L i I / 

1 Is3© 

LET [>8=i 

PEEK 

j *33) 

) 


I 19© 

IF DB=S 

THEN 

P f I> , 



1900 

- = - li 

IP E8 -8 

THEN 

J 6 

1210 

IF D8=3 

THEN 

1220 

IP ■_r H p ^ 

(D8Ì 

40© 




LET 

HI) 

= L t Xì 


=ABS 

<L9> 

AMD 

P 

= P t I) 

"1 



= ABS 

(L9) 

RN0 

P 

-P f I) 

* 1 



-RB5 

(F9) 

AND 

t 

= L c i; 

„ -T 



-RD3 

iPSì 

ANO 

L 

= L t I> 

+ 1 



t 09 + ì 

*P £ I 

jf f iL J. 

1 

PRINT RT 

L'IÌ 


PRINT RT 

LS .* P 

'8 

LET 

51=8 

1+10 


-NJ T 

HEN 

GOTO 

■& 

> 
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inseriti come singola lettera. 

Come i folletti possono barare, anche voi potete (almeno 
tina volta nella vita) chiedere aiuto a particolari poteri para¬ 
normali con cui vi s mate ria li zza te da una parte per riapparire 
da un'altra. Questa mossa, determinata dal "Panico" è a vostro 
rischio e pericolo, dato che oltre a disporne una sola volta, vi 
può far riapparire direttamente su una mina o fra le braccia di 
un simpatico ed amichevole folletto desideroso di fare una 
vostra conoscenza molto ravvicinala,,. 


Cercate di non farvi prendere dal panico,anche mentre carica¬ 
te il listato: i follettìni sono per l’occasione interpretali dalle 
virgolette in re verse, quindi ricordatevi di schiacciare prima 
Graphics e poi battete il solito Shift per avere le virgolette. 
Altra confusione può essere causata dall’ammasso di virgolet¬ 
te normali alla nga 360: sono una virgoletta normale, quella 
doppia sul tasto Q, la P, ancora quella doppia e via con il 
resto; idem per le altre virgolette triple... cercate di non fare 
guai perché se il programma non vi gira è colpa vostra. 


xa30 IF D6 < >139 TH£N GOTO 1S70 
1240 LET L VIJ -US 
LET PfIi=PS 
3.060 GOTO 1330 

1S70 IP D0-S7 T HtN FRINÌ RT LO .* P 

■ 1 K fc I 


±2sj0 IF THtN RRINT hT L<I'ì 

;Ptlì ; CHRj 139 


13 90 
i:-ì00 

1310 

1339 

1330 

HEN 

1335 

134-0 

1350 

1360 

13 70 

1360 

1390 

pto 

1-4-00 


IF D8oS THEN GOTO 1330 
LET Cl-Cl-1 

PRINT AT Li li .Pii);' 1 / 

LET LtIj=0 

IF INT tPNO-sei =4- AND Ci T 
LET 1=1-1 
NEXT I 

PRINT fìT 9,28:51.; CHR$ 128 
IF C1 =0 THEN GOTO 1S£0 
GOTO 800 
LET C3=C3+1 

IF Cj’l THEN G'JT U 14 SO 
PRINT RT 20,0:"HRX Glfi"" U5 

1 UOLTR Lfì "”P. 

LET 


14- ±0 GOTO 600 


PRINT RT LLPl;"." 

±422 LET Ll-INT < (RND^17Ì +2) 
1434 LET P1=±NT t IRND*22> *2> 


14315 LET L2 =L 1 


;ì-t26 LET P2=P1 


; 423 PRINT FiT 
14-30 GOTO 1O20 
U40 PRINT RT 
1450 IF 08-109 
14-60 PRINT RT 
I 5TFTO UCCISO 
J 470 GOTO 133© 
14-30 PRINT RT 
1433 PRINT RT 
15130 PRINT RT 
OLLETTO TI HA 


LI,Pii N$ 

LI . Pi : " , Jl 

then'' gÒt a 15O0 

20,0.; "PURTROPPO SE 


Ltl) ,Pi I) ; CHRì 139 
L6,, pc; u . j 

20,0.: "PECCRTO UN F 
UCCISO" 


1610 GOTO 1560 

PRINT RT 20,0J"ERRUO.Hftl FP 

?TO FUORI I FOLLETTI" 

163© PPINT RT 4,26! ‘'ULTIMO 1 ' 

154-0 PRINT RT 21,0: " HAI FATTO 
MI; " MOSSE - " 

1550 GOTO 1710 

15t>0 PRINT RT 21,0.: "SEI SOPRRUIS 

SUTD M jMl;“ MOSSE," 


15 70 

PRINT 

RT 

# ■ 



1680 

PRINT 

RT 

f,i; " COSA 

NE 

DICI 


■ i 



1590 

PRINT 

RT 

* * 

6 , l : 


16 00 

PRINT 

RT 

~7 * 1DI UN 

NUQU 

O GIOCO 7 


m » 


lOIQ 

PRINT 

RT 

b H 

s , i; ” 


169 0 

INPUT 

OJ 



1630 

IF D $ (lì 

“ * 1 N 11 THEN GOTO 

1900 

164-0 

XF ( 1) 

= "S" THEN GOTO 

1090 

1650 

PRINT 

■ b 

AT 

UN"" ALTPR 

1660 

PRINT 

RT 

6, u " 

PRRT 

TTR 

E ■ 



■J. 6 7 0 

PRINT 

AT 

7 > i; - si 

O 

NO 

% m 



JL6S0 

GOTO 

1630 



L 390 CLS 
1700 GOTO 510 
1710 LET Fl=Fl-5 
1^20 LET Cl=3 
1/40 PROSE 900 
1750 CLS 

1760 PRINT M I PROSSIMI FOLLETTI 
NON SRRRNNO" 

1770 PRINT "COSI " 11 FRCIL I , , „ SUO 
NR FORTUNA" 

1780 IF C3 > 1 THEN PRINT "HR HAI 
1 NUOUO M,, P M,, -.PRNICO u 


17S5 

LET C3~0 


1790 

POR F 

=0 TO 20 


1600 

PRINT 

AT 7,G+F 

; " Stì B B" 

1310 

PRINT 



1830 

PPINT 

TRE 0+F.; 

“ £fl ffi ni" 

300 

PRINT 


_l 640 

PRINT 

TRE 0+F; 

" £1 i3 HJ ■ 

1050 

PRINT 


±860 

PRINT 

TRB 0+F; 

B W“ 

1870 

PRINT 

RT 10,G+F ; " ";wt 

136® 

NEXT 

F 


1390 

GOTO 

552 


1900 

CLS 



1320 

■Ol 1 ■ 

PRINT 

RT 5.. 6;" 

COPYRIGHT 19S 

±930 

PRINT 

RT 7.3;" 

ZX USER CLUB" 

—’ v’uU 

5AUE 

■JmJ” 


QSi© 

GOTO 

10 
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